home *** CD-ROM | disk | FTP | other *** search
/ Micromanía 93 / CDMM_93_2.ISO / Project Nomads / nomads_demo_eng.exe / MISSILE_GOTO.TCL < prev    next >
Encoding:
Text File  |  2001-04-10  |  603 b   |  27 lines
  1. # -----------------------------------------------------------
  2. # Manoever fuer Raketen:
  3. # einfacher Zielanflug
  4. #
  5. #   ⌐ radon labs gmbh
  6. #
  7. #   18-Aug-00   af          created
  8. #   18-Aug-00   Don Lorenzo heiratet heute
  9. # ------------------------------------------------------------
  10.  
  11. # eine Root fuer Anflugmanoever
  12. new nroot missile/goto
  13. sel missile/goto
  14.  
  15. # einfaches Anfliegen
  16. new ncommandlist follow
  17. follow.setadjusttype    follow
  18. follow.settestcommand   mgfollow_test
  19. follow.addcommand  false 0 0 0 false 0 0 0 nothing 0.5
  20.  
  21. proc mgfollow_test {} { return 1.0 }
  22.  
  23.  
  24. sel ..
  25. sel ..
  26.  
  27.